home *** CD-ROM | disk | FTP | other *** search
/ BCI NET / BCI NET Dec 94.iso / archives / programming / source / gblanker3.5.src.lha / GSource / Blankers / Species / prefs.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-10-08  |  2.4 KB  |  135 lines
  1. /*
  2.  *  Copyright (c) 1994 Michael D. Bayne.
  3.  *  All rights reserved.
  4.  *
  5.  *  Please see the documentation accompanying the distribution for distribution
  6.  *  and disclaimer information.
  7.  */
  8.  
  9. #include <libraries/gadtools.h>
  10.  
  11. #include <clib/exec_protos.h>
  12. #include <clib/intuition_protos.h>
  13. #include <clib/gadtools_protos.h>
  14.  
  15. #include "/Garshnelib/Garshnelib_protos.h"
  16. #include "/Garshnelib/Garshnelib_pragmas.h"
  17.  
  18. #include "Species.h"
  19. #include "Species_rev.h"
  20. #include "/main.h"
  21. #include "//defs.h"
  22.  
  23. struct ModulePrefs
  24. {
  25.     LONG Mode;
  26.     LONG Size;
  27. };
  28.  
  29. struct ModulePrefs nP;
  30. VOID *OldPrefs = 0L;
  31. STATIC const UBYTE VersTag[] = VERSTAG;
  32.  
  33. int BT_SAVEClicked( VOID )
  34. {
  35.     if( OldPrefs )
  36.     {
  37.         CopyMem( &nP, OldPrefs, sizeof( struct ModulePrefs ));
  38.         SavePrefs( OldPrefs );
  39.         OldPrefs = 0L;
  40.     }
  41.     
  42.     return QUIT;
  43. }
  44.  
  45. int BT_TESTClicked( VOID )
  46. {
  47.     MessageServer( BM_SENDBLANK );
  48.  
  49.     return OK;
  50. }
  51.  
  52. int BT_SCREENClicked( VOID )
  53. {
  54.     ScreenModeRequest( SpeciesWnd, &nP.Mode, 0L );
  55.     
  56.     return OK;
  57. }
  58.  
  59. int BT_CANCELClicked( VOID )
  60. {
  61.     OldPrefs = 0L;
  62.     
  63.     return QUIT;
  64. }
  65.  
  66. int SL_SIZEClicked( VOID )
  67. {
  68.     nP.Size = SpeciesMsg.Code;
  69.  
  70.     return OK;
  71. }
  72.  
  73. #define BL_SetGadgetAttrs( Gad, Tag, Val ) GT_SetGadgetAttrs( SpeciesGadgets[Gad], SpeciesWnd, 0L, Tag, Val, TAG_END )
  74.  
  75. int SpeciesVanillaKey( VOID )
  76. {
  77.     switch( SpeciesMsg.Code ) {
  78.     case 's':
  79.         return BT_SAVEClicked();
  80.     case 't':
  81.         return BT_TESTClicked();
  82.     case 'd':
  83.         return BT_SCREENClicked();
  84.     case 'c':
  85.         return QUIT;
  86.     case 'i':
  87.         BL_SetGadgetAttrs( GD_SL_SIZE, GTSL_Level, Inc( nP.Size, 1, 10 ));
  88.         return OK;
  89.     case 'I':
  90.         BL_SetGadgetAttrs( GD_SL_SIZE, GTSL_Level, Dec( nP.Size, 1, 3 ));
  91.         return OK;
  92.     default:
  93.         return OK;
  94.     }
  95. }
  96.  
  97. VOID DoPrefs( LONG command, VOID *Prefs )
  98. {
  99.     switch( command )
  100.     {
  101.     case STARTUP:
  102.         OldPrefs = Prefs;
  103.         CopyMem( Prefs, &nP, sizeof( struct ModulePrefs ));
  104.         if( !SetupScreen())
  105.         {
  106.             SpeciesLeft = ( Scr->Width - ComputeX( SpeciesWidth ))/2 - Scr->WBorRight;
  107.             SpeciesTop = ( Scr->Height - ComputeY( SpeciesHeight ) - Font->ta_YSize )/2 -
  108.                 Scr->WBorBottom;
  109.             if( !OpenSpeciesWindow())
  110.                 BL_SetGadgetAttrs( GD_SL_SIZE, GTSL_Level, nP.Size );
  111.             CloseDownScreen();
  112.         }
  113.         break;
  114.     case IDCMP:
  115.         if( HandleSpeciesIDCMP() != QUIT )
  116.             break;
  117.     case KILL:
  118.         CloseSpeciesWindow();
  119.         break;
  120.     }
  121. }
  122.  
  123. LONG WndSignal( VOID )
  124. {
  125.     return SpeciesWnd ? 1L << SpeciesWnd->UserPort->mp_SigBit : 0L;
  126. }
  127.  
  128. VOID FillDefaults( VOID *Prefs )
  129. {
  130.     struct ModulePrefs mPO = { 0L, 5L };
  131.  
  132.     mPO.Mode = getTopScreenMode();
  133.     CopyMem( &mPO, Prefs, sizeof( struct ModulePrefs ));
  134. }
  135.